home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
bioinformatics.org
/
bioinformatics.org_software.tar
/
www.bioinformatics.org
/
download
/
ecell2
/
ecell220setup.exe
/
{app}
/
standard
/
STDR
/
RandomUniBiReactor.rd
< prev
next >
Wrap
Text File
|
2000-03-03
|
2KB
|
50 lines
@CLASSNAME:RandomUniBiReactor
@BASECLASS:FluxReactor
@BRIEF_DESCRIPTION: Random Uni Bi reaction system
#%VERSION: E-CELL, Reactor
%VERSION: ecs-v09, 0.1
@DATE: 30/6/1999
@AUTHOR: Masayuki Okayama
@EMAIL: t98204mo@sfc.keio.ac.jp
@DESCRIPTION: A reactor class for a random bireactant system in the Uni Bi direction.
@EQUATION:$$v=\frac{M(P)\:[E]}{Den}$$\\
Where\\
$M(P)=k_{+1}k_{+4}k_{+5}(k_{+2}+k_{+3})[S_{1}]+k_{+1}k_{+2}k_{+4}k_{-3}[S_{1}][P_{1}]+k_{-1}(-k_{-2}k_{-4}k_{+5}-k_{+4}k_{-3}k_{-5})[P_{1}][P_{2}]+k_{+1}k_{-2}k_{+3}k_{+5}[S_{1}][P_{2}]-k_{-1}k_{-2}k_{-4}k_{-3}[P_{1}]^{2}[P_{2}]-k_{-1}k_{-2}k_{-3}k_{-5}[P_{1}][P_{2}]^{2}$\\
Where\\
$Den=k_{+4}k_{+5}(k_{-1}+k_{+2}+k_{+3})+k_{+1}(k_{+2}k_{+5}+k_{+4}k_{+5}+k_{+4}k_{+3})[S_{1}]+(k_{-1}k_{-2}k_{+5}+k_{-2}k_{+3}k_{+5}+k_{-1}k_{+4}k_{-5}+k_{+2}k_{+4}k_{-5}+k_{+4}k_{+3}k_{-5})[P_{2}]+(k_{-1}k_{+4}k_{-3}+k_{+2}k_{+4}k_{-3}+k_{-1}k_{-4}k_{+5}+k_{+2}k_{-4}k_{+5}+k_{-4}k_{+3}k_{+5})[P_{1}]+k_{+1}k_{-3}(k_{+2}+k_{+4})[S_{1}][P_{1}]+k_{+1}k_{-2}(k_{+5}+k_{+3})[S_{1}][P_{2}]+(k_{-1}k_{-2}k_{-3}+k_{-2}k_{-4}k_{+5}+k_{-2}k_{-4}k_{+3}+k_{+2}k_{-3}k_{-5}+k_{+4}k_{-3}k_{-5})[P_{1}][P_{2}]+k_{-4}k_{-3}(k_{-1}+k_{+2})[P_{1}]^{2}+k_{-2}k_{-5}(k_{-1}+k_{+3})[P_{2}]^{2}+k_{+1}k_{-2}k_{-3}[S_{1}][P_{1}][P_{2}]+k_{-2}k_{-4}k_{-3}[P_{1}]^{2}[P_{2}]+k_{-2}k_{-3}k_{-5}[P_{1}][P_{2}]^{2}$\\
%SUBSTANCE: Substrate,1 ,1 ,
%SUBSTANCE: Product, 2, 2,
%SUBSTANCE: Catalyst, 1, 1,
%PARAMETER:k1, Float,
%PARAMETER:k_1, Float,
%PARAMETER:k2, Float,
%PARAMETER:k_2, Float,
%PARAMETER:k4, Float,
%PARAMETER:k_4, Float,
%PARAMETER:k3, Float,
%PARAMETER:k_3, Float,
%PARAMETER:k5, Float,
%PARAMETER:k_5, Float,
@REACT_FUNC:
Float velocity = catalyst(0)->quantity();
Float P1= product(0)->concentration();
Float P2= product(1)->concentration();
Float S1= substrate(0)->concentration();
Float MP = k1*k4*k5*(k2+k3)*S1+k1*k2*k4*k_3*S1*P1+k_1*(k_2*k_4*k5-k4*k_3*k_5)*P1*P2+k1*k_2*k3*k5*S1*P2-k_1*k_2*k_4*k_3*pow(P1,2)*P2-k_1*k_2*k_3*k_5*P1*pow(P2,2);
Float Den= k4*k5*(k_1+k2+k3)+k1*(k2*k5+k4*k5+k4*k3)*S1+(k_1*k_2*k5+k_2*k3*k5+k_1*k4*k_5+k2*k4*k_5+k4*k3*k_5)*P2+(k_1*k4*k_3+k2*k4*k_3+k_1*k_4*k5+k2*k_4*k5+k_4*k3*k5)*P1+k1*k_3*(k2+k4)*S1*P1+k1*k_2*(k5+k3)*S1*P2+(k_1*k_2*k_3+k_2*k_4*k5+k_2*k_4*k3+k2*k_3*k_5+k4*k_3*k_5)*P1*P2+k_4*k_3*(k_1+k2)*pow(P1,2)+k_2*k_5*(k_1+k3)*pow(P2,2)+k1*k_2*k_3*S1*P1*P2+k_2*k_4*k_3*pow(P1,2)*P2+k_2*k_3*k_5*P1*pow(P2,2);
velocity *= MP;
velocity /= Den;
process(velocity);